<?php
    session_start();
    include_once '../../../../controlador/php/conexion/Conexion.php';
    $con = new Conexion();
    
    $genp = $_REQUEST['oidgp'];
    $oide = $_REQUEST['oide'];
    
    $fecha = $_REQUEST['fechae'];
    $fec = date('Y-m-d',strtotime($fecha));
    $med = $_REQUEST['medico'];
    $ser = $_REQUEST['servicio'];
    $esp = $_REQUEST['especialidad'];
    
    $cup1 = $_REQUEST['cup1'];
    $cod1 = $_REQUEST['codigo1'];
    $pro1 = $_REQUEST['procedimiento1'];
    $cpro1 = $_REQUEST['cuprocedimiento1'];
    
    $cup2 = $_REQUEST['cup2'];
    $cod2 = $_REQUEST['codigo2'];
    $pro2 = $_REQUEST['procedimiento2'];
    $cpro2 = $_REQUEST['cuprocedimiento2'];
    
    $cup3 = $_REQUEST['cup3'];
    $cod3 = $_REQUEST['codigo3'];
    $pro3 = $_REQUEST['procedimiento3'];
    $cpro3 = $_REQUEST['cuprocedimiento3'];
    
    $cup4 = $_REQUEST['cup4'];
    $cod4 = $_REQUEST['codigo4'];
    $pro4 = $_REQUEST['procedimiento4'];
    $cpro4 = $_REQUEST['cuprocedimiento4'];
    
    $cup5 = $_REQUEST['cup5'];
    $cod5 = $_REQUEST['codigo5'];
    $pro5 = $_REQUEST['procedimiento5'];
    $cpro5 = $_REQUEST['cuprocedimiento5'];
    
    $cup6 = $_REQUEST['cup6'];
    $cod6 = $_REQUEST['codigo6'];
    $pro6 = $_REQUEST['procedimiento6'];
    $cpro6 = $_REQUEST['cuprocedimiento6'];
    
    $obs = $_REQUEST['obs'];
    
    $pcha = $_REQUEST['pcha'];
    
    
   /* $ExisteAmbulatorio = "SELECT COUNT(*) AS N,pracodser1,pracodser2,pracodser3,pracodser4,pracodser5,pracodser6,prafech,GETDATE() AS FECHA_ACTUAL
                          FROM pcprogramaA
                          WHERE genPacien = '".$genp."'
                          GROUP BY pracodser1,pracodser2,pracodser3,pracodser4,pracodser5,pracodser6,prafech
                          ORDER BY prafech DESC";
    $res = $con ->query($ExisteAmbulatorio);
    
    while ($res2 = mssql_fetch_array($res)){
        $N = $res2['N'];
        $FechaR = $res2['prafech'];
        $FechaA = $res2['FECHA_ACTUAL'];
        $pracodser1 = $res2['pracodser1'];
        $pracodser2 = $res2['pracodser2'];
        $pracodser3 = $res2['pracodser3'];
        $pracodser4 = $res2['pracodser4'];
        $pracodser5 = $res['pracodser5'];
        $pracodser6 = $res2['pracodser6'];
        
    }
    
    $FechaRegistro = date('Y-m-d 00:00:00.000',strtotime($FechaR));
    $FechaActual = date('Y-m-d 00:00:00.000',strtotime($FechaA));*/
    
    /*if($N == 1){
        if($FechaRegistro == $FechaActual){
            if($pracodser1 == $cod1 && $pracodser2 == $cod2 && $pracodser3 == $cod3 && $pracodser4 == $cod4 && $pracodser5 == $cod5 && $pracodser6 == $cod6){
             
                print_r(json_encode(array('r'=>1)));
            }
               
        }else{*/
            $inser = "insert into pcprogramaA(genPacien,gendetcon,prafecven,pramedico,praservicio,praespeciali,pracup1,pracodser1,praproce1,pracuproce1,pracup2,pracodser2,praproce2,pracuproce2,pracup3,pracodser3,praproce3,pracuproce3,pracup4,pracodser4,praproce4,pracuproce4,pracup5,pracodser5,praproce5,pracuproce5,pracup6,pracodser6,praproce6,pracuproce6,usuoid,prafech,praobs,pratprogram)
                      values('".$genp."','".$oide."','".$fec."','".$med."','".$ser."','".$esp."','".$cup1."','".$cod1."','".$pro1."','".$cpro1."','".$cup2."','".$cod2."','".$pro2."','".$cpro2."','".$cup3."','".$cod3."','".$pro3."','".$cpro3."','".$cup4."','".$cod4."','".$pro4."','".$cpro4."','".$cup5."','".$cod5."','".$pro5."','".$cpro5."','".$cup6."','".$cod6."','".$pro6."','".$cpro6."','".$_SESSION['usuario']."',GETDATE(),'".$obs."',".$pcha.")";
            $con->query($inser);

            //se extrae el oid de la programcion
            $oidlt = "SELECT SCOPE_IDENTITY () oid";

            $oidltr = $con->query($oidlt);


            while ($resp = mssql_fetch_array($oidltr)){
                $oidpca = $resp['oid'];
            }

            $pcprograma = "insert into pcprogambu(folioid,proestado,profecha)values('".$oidpca."','2',GETDATE())";
            $con->query($pcprograma);


            //se extrae el oid de la programcion y guardar historial
            $oidlt2 = "SELECT SCOPE_IDENTITY () oid";

            $oidltr2 = $con->query($oidlt2);


            while ($resp2 = mssql_fetch_array($oidltr2)){
                $proid = $resp2['oid'];
            }

            $histo = "insert into pchisambu(hisestado,usuoid,hisfecha,proid,hisobserv,hispqrp)values('2','".$_SESSION['usuario']."',GETDATE(),'".$proid."','','')";
            $con->query($histo);

            $con->cerrarConexion();

            $documento = $_REQUEST['documento'];
            $Consultar = "select top 1 programa.praoid,PACNUMDOC,ltrim(rtrim(PACPRINOM)) + ' ' +ltrim(rtrim(PACSEGNOM))+' '+ltrim(rtrim(PACPRIAPE)) + ' ' +ltrim(rtrim(PACSEGAPE)) AS NombreCompleto,praoid,serviciosL.ser_oid,GENESPECI.GEEDESCRI,GENESPECI.OID,
                           prafech, GDENOMBRE
                           from pcprogramaA as programa left outer join serviciosL on programa.praservicio = serviciosL.ser_oid
                           left outer join ".$con->getReal()."..GENESPECI on programa.praespeciali = ".$con->getReal()."..GENESPECI.OID
                           left outer join ".$con->getReal()."..GENPACIEN as A on programa.genPacien = A.OID
                           LEFT OUTER JOIN ".$con->getReal()."..GENDETCON ON A.GENDETCON = GENDETCON.OID
                           left outer join pcprogambu as pgambu on programa.praoid = pgambu. folioid
                           outer apply (select top 1 hiscancelado as cancelado 
                                        from pchisambu
                                        where pchisambu.proid = pgambu.proid
                                        order by hisfecha desc)as cancel
                           where PACNUMDOC = '".$documento."'
                           order by prafech desc";
           $Respuesta = $con ->query($Consultar);
           while ($Respuesta2 = mssql_fetch_array($Respuesta)){
               
               $Lista[] = array_map(utf8_encode,$Respuesta2);
           }
           
           print_r(json_encode($Lista));
     
?>
